## Liste des librairies utilisées
packages <- c("dplyr", "sf", "mapsf", "leaflet", "mapview", "btb")
## Vérifier si la librairie est installée, si non l'installer, puis la charger
package.check <- lapply(
packages,
FUN = function(x) {
if (!require(x, character.only = TRUE)) {
install.packages(x, dependencies = TRUE, quiet = TRUE)
library(x, character.only = TRUE)
}
}
)














